home *** CD-ROM | disk | FTP | other *** search
/ Word Perfect Main Street: Paper Planes / WordPerfect Main Street - Paper Planes.iso / mac / Demo / 00077_Script_77 < prev    next >
Text File  |  1994-08-02  |  267b  |  13 lines

  1. --init plane 18
  2. on exitFrame
  3.   global Plane, NumSteps, Step
  4.   
  5.   set Plane = 18
  6.   set NumSteps = 21
  7.   set Step = 1
  8.   
  9.   set the text of field "NumLevels" = string(NumSteps)
  10.   global theGauge
  11.   mSetNumLevels(theGauge, NumSteps)
  12.   mSetLevel(theGauge, 1)
  13. end